(replace-rectangle): Don't call string-rectangle-line

with too many arguments.

diff --git a/lisp/rect.el b/lisp/rect.el
index a48b0e650ce4a74ec1302ce2b1421771b8c4fd06..1be2c938198e6992da7ee39e21b4bd688fb794f6 100644 (file)
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -344,7 +344,7 @@ This command does not delete or overwrite any existing text."
 (defun replace-rectangle (start end string)
   "Like `string-rectangle', but replace the original region."
   (interactive "*r\nsString rectangle: ")
-  (apply-on-rectangle 'string-rectangle-line start end string t))
+  (apply-on-rectangle 'string-rectangle-line start end string))
 
 ;;;###autoload
 (defun clear-rectangle (start end &optional fill)